home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Programming / Source / TravelingSalesman / Source_code / drawingFuncs.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-08-26  |  25.5 KB  |  762 lines

  1. /* drawingFuncs.c generated from drawingFuncs.psw
  2.    by unix pswrap V1.009  Wed Apr 19 17:50:24 PDT 1989
  3.  */
  4.  
  5. #include <dpsclient/dpsfriends.h>
  6. #include <string.h>
  7.  
  8. #line 1 "drawingFuncs.psw"
  9. /*
  10.  * drawingFuncs.psw  
  11.  *
  12.  * You may freely copy, distribute, and reuse the code in this example.
  13.  * NeXT disclaims any warranty of any kind, expressed or implied, as to its
  14.  * fitness for any particular use.
  15.  *
  16.  */ 
  17. #line 18 "drawingFuncs.c"
  18. void loadPSProcedures( void )
  19. {
  20.   typedef struct {
  21.     unsigned char tokenType;
  22.     unsigned char topLevelCount;
  23.     unsigned short nBytes;
  24.  
  25.     DPSBinObjGeneric obj0;
  26.     DPSBinObjGeneric obj1;
  27.     DPSBinObjGeneric obj2;
  28.     DPSBinObjGeneric obj3;
  29.     DPSBinObjGeneric obj4;
  30.     DPSBinObjGeneric obj5;
  31.     DPSBinObjGeneric obj6;
  32.     DPSBinObjGeneric obj7;
  33.     DPSBinObjGeneric obj8;
  34.     DPSBinObjGeneric obj9;
  35.     DPSBinObjGeneric obj10;
  36.     DPSBinObjGeneric obj11;
  37.     DPSBinObjGeneric obj12;
  38.     DPSBinObjGeneric obj13;
  39.     DPSBinObjGeneric obj14;
  40.     DPSBinObjGeneric obj15;
  41.     DPSBinObjGeneric obj16;
  42.     DPSBinObjGeneric obj17;
  43.     DPSBinObjGeneric obj18;
  44.     DPSBinObjGeneric obj19;
  45.     DPSBinObjGeneric obj20;
  46.     DPSBinObjGeneric obj21;
  47.     DPSBinObjGeneric obj22;
  48.     DPSBinObjGeneric obj23;
  49.     DPSBinObjGeneric obj24;
  50.     DPSBinObjGeneric obj25;
  51.     DPSBinObjGeneric obj26;
  52.     DPSBinObjGeneric obj27;
  53.     DPSBinObjGeneric obj28;
  54.     DPSBinObjGeneric obj29;
  55.     DPSBinObjGeneric obj30;
  56.     DPSBinObjGeneric obj31;
  57.     DPSBinObjGeneric obj32;
  58.     DPSBinObjGeneric obj33;
  59.     DPSBinObjGeneric obj34;
  60.     DPSBinObjGeneric obj35;
  61.     DPSBinObjGeneric obj36;
  62.     DPSBinObjGeneric obj37;
  63.     DPSBinObjGeneric obj38;
  64.     DPSBinObjGeneric obj39;
  65.     DPSBinObjGeneric obj40;
  66.     DPSBinObjGeneric obj41;
  67.     DPSBinObjGeneric obj42;
  68.     DPSBinObjGeneric obj43;
  69.     DPSBinObjGeneric obj44;
  70.     DPSBinObjGeneric obj45;
  71.     DPSBinObjGeneric obj46;
  72.     DPSBinObjGeneric obj47;
  73.     DPSBinObjGeneric obj48;
  74.     DPSBinObjGeneric obj49;
  75.     DPSBinObjGeneric obj50;
  76.     DPSBinObjGeneric obj51;
  77.     DPSBinObjGeneric obj52;
  78.     DPSBinObjGeneric obj53;
  79.     DPSBinObjGeneric obj54;
  80.     DPSBinObjGeneric obj55;
  81.     DPSBinObjGeneric obj56;
  82.     DPSBinObjGeneric obj57;
  83.     DPSBinObjGeneric obj58;
  84.     DPSBinObjGeneric obj59;
  85.     DPSBinObjGeneric obj60;
  86.     DPSBinObjGeneric obj61;
  87.     DPSBinObjGeneric obj62;
  88.     DPSBinObjGeneric obj63;
  89.     DPSBinObjGeneric obj64;
  90.     DPSBinObjGeneric obj65;
  91.     DPSBinObjGeneric obj66;
  92.     DPSBinObjGeneric obj67;
  93.     DPSBinObjGeneric obj68;
  94.     DPSBinObjGeneric obj69;
  95.     DPSBinObjGeneric obj70;
  96.     DPSBinObjGeneric obj71;
  97.     DPSBinObjGeneric obj72;
  98.     DPSBinObjGeneric obj73;
  99.     DPSBinObjGeneric obj74;
  100.     DPSBinObjGeneric obj75;
  101.     DPSBinObjGeneric obj76;
  102.     } _dpsQ;
  103.   static const _dpsQ _dpsStat = {
  104.     DPS_DEF_TOKENTYPE, 30, 620,
  105.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xpos */
  106.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  107.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  108.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ypos */
  109.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  110.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  111.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ticklength */
  112.     {DPS_LITERAL|DPS_ARRAY, 0, 10, 536},
  113.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  114.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* getticklength */
  115.     {DPS_EXEC|DPS_ARRAY, 0, 8, 472},
  116.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  117.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* vtick */
  118.     {DPS_EXEC|DPS_ARRAY, 0, 5, 432},
  119.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  120.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* htick */
  121.     {DPS_EXEC|DPS_ARRAY, 0, 4, 400},
  122.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  123.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* increase-x */
  124.     {DPS_EXEC|DPS_ARRAY, 0, 5, 360},
  125.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  126.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* decrease-x */
  127.     {DPS_EXEC|DPS_ARRAY, 0, 5, 320},
  128.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  129.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* increase-y */
  130.     {DPS_EXEC|DPS_ARRAY, 0, 5, 280},
  131.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  132.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* decrease-y */
  133.     {DPS_EXEC|DPS_ARRAY, 0, 5, 240},
  134.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  135.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ypos */
  136.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  137.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  138.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  139.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  140.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ypos */
  141.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  142.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  143.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  144.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  145.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xpos */
  146.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  147.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  148.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  149.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  150.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xpos */
  151.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  152.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  153.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  154.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  155.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  156.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  157.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 133},    /* rlineto */
  158.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  159.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  160.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  161.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  162.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 133},    /* rlineto */
  163.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  164.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  165.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 82},    /* idiv */
  166.     {DPS_LITERAL|DPS_INT, 0, 0, 10},
  167.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 106},    /* mod */
  168.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 0},    /* abs */
  169.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ticklength */
  170.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 62},    /* exch */
  171.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 75},    /* get */
  172.     {DPS_LITERAL|DPS_INT, 0, 0, 8},
  173.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  174.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  175.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  176.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  177.     {DPS_LITERAL|DPS_INT, 0, 0, 5},
  178.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  179.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  180.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  181.     {DPS_LITERAL|DPS_INT, 0, 0, 2},
  182.     }; /* _dpsQ */
  183.   _dpsQ _dpsF;    /* local copy  */
  184.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  185.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  186.   static long int _dpsCodes[19] = {-1};
  187.   {
  188. if (_dpsCodes[0] < 0) {
  189.     static const char * const _dps_names[] = {
  190.     "xpos",
  191.     (char *) 0 ,
  192.     (char *) 0 ,
  193.     (char *) 0 ,
  194.     (char *) 0 ,
  195.     "ypos",
  196.     (char *) 0 ,
  197.     (char *) 0 ,
  198.     (char *) 0 ,
  199.     (char *) 0 ,
  200.     "ticklength",
  201.     (char *) 0 ,
  202.     "getticklength",
  203.     "vtick",
  204.     "htick",
  205.     "increase-x",
  206.     "decrease-x",
  207.     "increase-y",
  208.     "decrease-y"};
  209.     long int *_dps_nameVals[19];
  210.     _dps_nameVals[0] = &_dpsCodes[0];
  211.     _dps_nameVals[1] = &_dpsCodes[1];
  212.     _dps_nameVals[2] = &_dpsCodes[2];
  213.     _dps_nameVals[3] = &_dpsCodes[3];
  214.     _dps_nameVals[4] = &_dpsCodes[4];
  215.     _dps_nameVals[5] = &_dpsCodes[5];
  216.     _dps_nameVals[6] = &_dpsCodes[6];
  217.     _dps_nameVals[7] = &_dpsCodes[7];
  218.     _dps_nameVals[8] = &_dpsCodes[8];
  219.     _dps_nameVals[9] = &_dpsCodes[9];
  220.     _dps_nameVals[10] = &_dpsCodes[10];
  221.     _dps_nameVals[11] = &_dpsCodes[11];
  222.     _dps_nameVals[12] = &_dpsCodes[12];
  223.     _dps_nameVals[13] = &_dpsCodes[13];
  224.     _dps_nameVals[14] = &_dpsCodes[14];
  225.     _dps_nameVals[15] = &_dpsCodes[15];
  226.     _dps_nameVals[16] = &_dpsCodes[16];
  227.     _dps_nameVals[17] = &_dpsCodes[17];
  228.     _dps_nameVals[18] = &_dpsCodes[18];
  229.  
  230.     DPSMapNames(_dpsCurCtxt, 19, _dps_names, _dps_nameVals);
  231.     }
  232.   }
  233.  
  234.   _dpsF = _dpsStat;    /* assign automatic variable */
  235.  
  236.   _dpsP[0].val.nameVal = _dpsCodes[0];
  237.   _dpsP[46].val.nameVal = _dpsCodes[1];
  238.   _dpsP[45].val.nameVal = _dpsCodes[2];
  239.   _dpsP[41].val.nameVal = _dpsCodes[3];
  240.   _dpsP[40].val.nameVal = _dpsCodes[4];
  241.   _dpsP[3].val.nameVal = _dpsCodes[5];
  242.   _dpsP[36].val.nameVal = _dpsCodes[6];
  243.   _dpsP[35].val.nameVal = _dpsCodes[7];
  244.   _dpsP[31].val.nameVal = _dpsCodes[8];
  245.   _dpsP[30].val.nameVal = _dpsCodes[9];
  246.   _dpsP[6].val.nameVal = _dpsCodes[10];
  247.   _dpsP[64].val.nameVal = _dpsCodes[11];
  248.   _dpsP[9].val.nameVal = _dpsCodes[12];
  249.   _dpsP[12].val.nameVal = _dpsCodes[13];
  250.   _dpsP[15].val.nameVal = _dpsCodes[14];
  251.   _dpsP[18].val.nameVal = _dpsCodes[15];
  252.   _dpsP[21].val.nameVal = _dpsCodes[16];
  253.   _dpsP[24].val.nameVal = _dpsCodes[17];
  254.   _dpsP[27].val.nameVal = _dpsCodes[18];
  255.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,620);
  256. }
  257. #line 30 "drawingFuncs.psw"
  258.  
  259. #line 260 "drawingFuncs.c"
  260. void drawCircle(float x, float y, float radius)
  261. {
  262.   typedef struct {
  263.     unsigned char tokenType;
  264.     unsigned char topLevelCount;
  265.     unsigned short nBytes;
  266.  
  267.     DPSBinObjGeneric obj0;
  268.     DPSBinObjReal obj1;
  269.     DPSBinObjReal obj2;
  270.     DPSBinObjReal obj3;
  271.     DPSBinObjGeneric obj4;
  272.     DPSBinObjGeneric obj5;
  273.     DPSBinObjGeneric obj6;
  274.     DPSBinObjGeneric obj7;
  275.     DPSBinObjGeneric obj8;
  276.     } _dpsQ;
  277.   static const _dpsQ _dpsStat = {
  278.     DPS_DEF_TOKENTYPE, 9, 76,
  279.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111},    /* newpath */
  280.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  281.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  282.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: radius */
  283.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  284.     {DPS_LITERAL|DPS_INT, 0, 0, 360},
  285.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 5},    /* arc */
  286.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 22},    /* closepath */
  287.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  288.     }; /* _dpsQ */
  289.   _dpsQ _dpsF;    /* local copy  */
  290.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  291.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  292.   _dpsF = _dpsStat;    /* assign automatic variable */
  293.  
  294.   _dpsP[1].val.realVal = x;
  295.   _dpsP[2].val.realVal = y;
  296.   _dpsP[3].val.realVal = radius;
  297.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,76);
  298. }
  299. #line 38 "drawingFuncs.psw"
  300.  
  301. #line 302 "drawingFuncs.c"
  302. void join(float x1, float y1, float x2, float y2)
  303. {
  304.   typedef struct {
  305.     unsigned char tokenType;
  306.     unsigned char topLevelCount;
  307.     unsigned short nBytes;
  308.  
  309.     DPSBinObjGeneric obj0;
  310.     DPSBinObjReal obj1;
  311.     DPSBinObjReal obj2;
  312.     DPSBinObjGeneric obj3;
  313.     DPSBinObjReal obj4;
  314.     DPSBinObjReal obj5;
  315.     DPSBinObjGeneric obj6;
  316.     DPSBinObjGeneric obj7;
  317.     } _dpsQ;
  318.   static const _dpsQ _dpsStat = {
  319.     DPS_DEF_TOKENTYPE, 8, 68,
  320.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 111},    /* newpath */
  321.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x1 */
  322.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y1 */
  323.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  324.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x2 */
  325.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y2 */
  326.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  327.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  328.     }; /* _dpsQ */
  329.   _dpsQ _dpsF;    /* local copy  */
  330.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  331.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  332.   _dpsF = _dpsStat;    /* assign automatic variable */
  333.  
  334.   _dpsP[1].val.realVal = x1;
  335.   _dpsP[2].val.realVal = y1;
  336.   _dpsP[4].val.realVal = x2;
  337.   _dpsP[5].val.realVal = y2;
  338.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,68);
  339. }
  340. #line 46 "drawingFuncs.psw"
  341.  
  342. #line 343 "drawingFuncs.c"
  343. void drawAxes(float x, float y, float width, float height)
  344. {
  345.   typedef struct {
  346.     unsigned char tokenType;
  347.     unsigned char topLevelCount;
  348.     unsigned short nBytes;
  349.  
  350.     DPSBinObjGeneric obj0;
  351.     DPSBinObjGeneric obj1;
  352.     DPSBinObjReal obj2;
  353.     DPSBinObjReal obj3;
  354.     DPSBinObjGeneric obj4;
  355.     DPSBinObjGeneric obj5;
  356.     DPSBinObjGeneric obj6;
  357.     DPSBinObjGeneric obj7;
  358.     DPSBinObjGeneric obj8;
  359.     DPSBinObjReal obj9;
  360.     DPSBinObjReal obj10;
  361.     DPSBinObjGeneric obj11;
  362.     DPSBinObjGeneric obj12;
  363.     DPSBinObjGeneric obj13;
  364.     DPSBinObjReal obj14;
  365.     DPSBinObjGeneric obj15;
  366.     DPSBinObjGeneric obj16;
  367.     DPSBinObjGeneric obj17;
  368.     DPSBinObjGeneric obj18;
  369.     DPSBinObjGeneric obj19;
  370.     DPSBinObjGeneric obj20;
  371.     DPSBinObjGeneric obj21;
  372.     DPSBinObjGeneric obj22;
  373.     DPSBinObjGeneric obj23;
  374.     DPSBinObjReal obj24;
  375.     DPSBinObjGeneric obj25;
  376.     DPSBinObjGeneric obj26;
  377.     DPSBinObjReal obj27;
  378.     DPSBinObjGeneric obj28;
  379.     DPSBinObjGeneric obj29;
  380.     DPSBinObjGeneric obj30;
  381.     DPSBinObjGeneric obj31;
  382.     DPSBinObjGeneric obj32;
  383.     DPSBinObjGeneric obj33;
  384.     DPSBinObjGeneric obj34;
  385.     DPSBinObjGeneric obj35;
  386.     DPSBinObjGeneric obj36;
  387.     DPSBinObjGeneric obj37;
  388.     DPSBinObjReal obj38;
  389.     DPSBinObjGeneric obj39;
  390.     DPSBinObjGeneric obj40;
  391.     DPSBinObjGeneric obj41;
  392.     DPSBinObjGeneric obj42;
  393.     DPSBinObjGeneric obj43;
  394.     DPSBinObjGeneric obj44;
  395.     DPSBinObjGeneric obj45;
  396.     DPSBinObjGeneric obj46;
  397.     DPSBinObjGeneric obj47;
  398.     DPSBinObjGeneric obj48;
  399.     DPSBinObjGeneric obj49;
  400.     DPSBinObjGeneric obj50;
  401.     DPSBinObjGeneric obj51;
  402.     DPSBinObjGeneric obj52;
  403.     DPSBinObjGeneric obj53;
  404.     DPSBinObjGeneric obj54;
  405.     DPSBinObjGeneric obj55;
  406.     DPSBinObjGeneric obj56;
  407.     DPSBinObjGeneric obj57;
  408.     DPSBinObjGeneric obj58;
  409.     DPSBinObjGeneric obj59;
  410.     DPSBinObjGeneric obj60;
  411.     DPSBinObjGeneric obj61;
  412.     DPSBinObjGeneric obj62;
  413.     DPSBinObjGeneric obj63;
  414.     DPSBinObjGeneric obj64;
  415.     DPSBinObjGeneric obj65;
  416.     DPSBinObjGeneric obj66;
  417.     DPSBinObjGeneric obj67;
  418.     DPSBinObjGeneric obj68;
  419.     DPSBinObjGeneric obj69;
  420.     DPSBinObjGeneric obj70;
  421.     DPSBinObjGeneric obj71;
  422.     DPSBinObjGeneric obj72;
  423.     DPSBinObjGeneric obj73;
  424.     DPSBinObjGeneric obj74;
  425.     DPSBinObjGeneric obj75;
  426.     DPSBinObjGeneric obj76;
  427.     DPSBinObjGeneric obj77;
  428.     DPSBinObjGeneric obj78;
  429.     DPSBinObjGeneric obj79;
  430.     DPSBinObjGeneric obj80;
  431.     DPSBinObjGeneric obj81;
  432.     DPSBinObjGeneric obj82;
  433.     DPSBinObjGeneric obj83;
  434.     DPSBinObjGeneric obj84;
  435.     DPSBinObjGeneric obj85;
  436.     DPSBinObjGeneric obj86;
  437.     DPSBinObjGeneric obj87;
  438.     DPSBinObjGeneric obj88;
  439.     DPSBinObjGeneric obj89;
  440.     DPSBinObjGeneric obj90;
  441.     DPSBinObjGeneric obj91;
  442.     DPSBinObjGeneric obj92;
  443.     DPSBinObjGeneric obj93;
  444.     DPSBinObjGeneric obj94;
  445.     DPSBinObjGeneric obj95;
  446.     DPSBinObjGeneric obj96;
  447.     DPSBinObjGeneric obj97;
  448.     DPSBinObjGeneric obj98;
  449.     DPSBinObjGeneric obj99;
  450.     DPSBinObjGeneric obj100;
  451.     DPSBinObjGeneric obj101;
  452.     DPSBinObjReal obj102;
  453.     DPSBinObjGeneric obj103;
  454.     DPSBinObjGeneric obj104;
  455.     DPSBinObjGeneric obj105;
  456.     DPSBinObjGeneric obj106;
  457.     DPSBinObjGeneric obj107;
  458.     DPSBinObjGeneric obj108;
  459.     DPSBinObjGeneric obj109;
  460.     DPSBinObjGeneric obj110;
  461.     DPSBinObjGeneric obj111;
  462.     DPSBinObjGeneric obj112;
  463.     DPSBinObjGeneric obj113;
  464.     DPSBinObjGeneric obj114;
  465.     DPSBinObjGeneric obj115;
  466.     DPSBinObjGeneric obj116;
  467.     DPSBinObjGeneric obj117;
  468.     DPSBinObjGeneric obj118;
  469.     DPSBinObjGeneric obj119;
  470.     DPSBinObjGeneric obj120;
  471.     DPSBinObjGeneric obj121;
  472.     DPSBinObjGeneric obj122;
  473.     DPSBinObjGeneric obj123;
  474.     DPSBinObjGeneric obj124;
  475.     DPSBinObjGeneric obj125;
  476.     DPSBinObjGeneric obj126;
  477.     DPSBinObjGeneric obj127;
  478.     DPSBinObjGeneric obj128;
  479.     } _dpsQ;
  480.   static const _dpsQ _dpsStat = {
  481.     DPS_DEF_TOKENTYPE, 73, 1036,
  482.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 78},    /* gsave */
  483.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xmax */
  484.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  485.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: width */
  486.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  487.     {DPS_LITERAL|DPS_INT, 0, 0, 1},
  488.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 169},    /* sub */
  489.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  490.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ymax */
  491.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  492.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: height */
  493.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  494.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  495.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ymin */
  496.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: y */
  497.     {DPS_LITERAL|DPS_INT, 0, 0, 1},
  498.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 1},    /* add */
  499.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  500.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* xpos */
  501.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  502.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  503.     {DPS_LITERAL|DPS_NAME, 0, 0, 0},    /* ypos */
  504.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  505.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 51},    /* def */
  506.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  507.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymin */
  508.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  509.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  510.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymax */
  511.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  512.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xmax */
  513.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymax */
  514.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  515.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xmax */
  516.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymin */
  517.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  518.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 22},    /* closepath */
  519.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  520.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  521.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  522.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  523.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xmax */
  524.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  525.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  526.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  527.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  528.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymin */
  529.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  530.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  531.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymax */
  532.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 99},    /* lineto */
  533.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 167},    /* stroke */
  534.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  535.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  536.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  537.     {DPS_EXEC|DPS_ARRAY, 0, 6, 920},
  538.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  539.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  540.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  541.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  542.     {DPS_EXEC|DPS_ARRAY, 0, 6, 808},
  543.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  544.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  545.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  546.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  547.     {DPS_EXEC|DPS_ARRAY, 0, 6, 696},
  548.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  549.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  550.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  551.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 107},    /* moveto */
  552.     {DPS_EXEC|DPS_ARRAY, 0, 6, 584},
  553.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 101},    /* loop */
  554.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 77},    /* grestore */
  555.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  556.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymin */
  557.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 74},    /* ge */
  558.     {DPS_EXEC|DPS_ARRAY, 0, 7, 640},
  559.     {DPS_EXEC|DPS_ARRAY, 0, 1, 632},
  560.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  561.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  562.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  563.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* getticklength */
  564.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  565.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  566.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  567.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* htick */
  568.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* decrease-y */
  569.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  570.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ymax */
  571.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 97},    /* le */
  572.     {DPS_EXEC|DPS_ARRAY, 0, 7, 752},
  573.     {DPS_EXEC|DPS_ARRAY, 0, 1, 744},
  574.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  575.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  576.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  577.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* getticklength */
  578.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  579.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  580.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* ypos */
  581.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* htick */
  582.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* increase-y */
  583.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  584.     {DPS_LITERAL|DPS_REAL, 0, 0, 0},    /* param: x */
  585.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 74},    /* ge */
  586.     {DPS_EXEC|DPS_ARRAY, 0, 7, 864},
  587.     {DPS_EXEC|DPS_ARRAY, 0, 1, 856},
  588.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  589.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  590.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  591.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* getticklength */
  592.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  593.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  594.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  595.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* vtick */
  596.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* decrease-x */
  597.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  598.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xmax */
  599.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 97},    /* le */
  600.     {DPS_EXEC|DPS_ARRAY, 0, 7, 976},
  601.     {DPS_EXEC|DPS_ARRAY, 0, 1, 968},
  602.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 85},    /* ifelse */
  603.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 64},    /* exit */
  604.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  605.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* getticklength */
  606.     {DPS_EXEC|DPS_NAME, 0, DPSSYSNAME, 110},    /* neg */
  607.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* xpos */
  608.     {DPS_LITERAL|DPS_INT, 0, 0, 0},
  609.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* vtick */
  610.     {DPS_EXEC|DPS_NAME, 0, 0, 0},    /* increase-x */
  611.     }; /* _dpsQ */
  612.   _dpsQ _dpsF;    /* local copy  */
  613.   register DPSContext _dpsCurCtxt = DPSPrivCurrentContext();
  614.   register DPSBinObjRec *_dpsP = (DPSBinObjRec *)&_dpsF.obj0;
  615.   static long int _dpsCodes[41] = {-1};
  616.   {
  617. if (_dpsCodes[0] < 0) {
  618.     static const char * const _dps_names[] = {
  619.     "xmax",
  620.     (char *) 0 ,
  621.     (char *) 0 ,
  622.     (char *) 0 ,
  623.     (char *) 0 ,
  624.     "ymax",
  625.     (char *) 0 ,
  626.     (char *) 0 ,
  627.     (char *) 0 ,
  628.     (char *) 0 ,
  629.     "ymin",
  630.     (char *) 0 ,
  631.     (char *) 0 ,
  632.     (char *) 0 ,
  633.     (char *) 0 ,
  634.     "xpos",
  635.     (char *) 0 ,
  636.     (char *) 0 ,
  637.     (char *) 0 ,
  638.     (char *) 0 ,
  639.     (char *) 0 ,
  640.     (char *) 0 ,
  641.     "ypos",
  642.     (char *) 0 ,
  643.     (char *) 0 ,
  644.     (char *) 0 ,
  645.     (char *) 0 ,
  646.     (char *) 0 ,
  647.     (char *) 0 ,
  648.     "getticklength",
  649.     (char *) 0 ,
  650.     (char *) 0 ,
  651.     (char *) 0 ,
  652.     "htick",
  653.     (char *) 0 ,
  654.     "decrease-y",
  655.     "increase-y",
  656.     "vtick",
  657.     (char *) 0 ,
  658.     "decrease-x",
  659.     "increase-x"};
  660.     long int *_dps_nameVals[41];
  661.     _dps_nameVals[0] = &_dpsCodes[0];
  662.     _dps_nameVals[1] = &_dpsCodes[1];
  663.     _dps_nameVals[2] = &_dpsCodes[2];
  664.     _dps_nameVals[3] = &_dpsCodes[3];
  665.     _dps_nameVals[4] = &_dpsCodes[4];
  666.     _dps_nameVals[5] = &_dpsCodes[5];
  667.     _dps_nameVals[6] = &_dpsCodes[6];
  668.     _dps_nameVals[7] = &_dpsCodes[7];
  669.     _dps_nameVals[8] = &_dpsCodes[8];
  670.     _dps_nameVals[9] = &_dpsCodes[9];
  671.     _dps_nameVals[10] = &_dpsCodes[10];
  672.     _dps_nameVals[11] = &_dpsCodes[11];
  673.     _dps_nameVals[12] = &_dpsCodes[12];
  674.     _dps_nameVals[13] = &_dpsCodes[13];
  675.     _dps_nameVals[14] = &_dpsCodes[14];
  676.     _dps_nameVals[15] = &_dpsCodes[15];
  677.     _dps_nameVals[16] = &_dpsCodes[16];
  678.     _dps_nameVals[17] = &_dpsCodes[17];
  679.     _dps_nameVals[18] = &_dpsCodes[18];
  680.     _dps_nameVals[19] = &_dpsCodes[19];
  681.     _dps_nameVals[20] = &_dpsCodes[20];
  682.     _dps_nameVals[21] = &_dpsCodes[21];
  683.     _dps_nameVals[22] = &_dpsCodes[22];
  684.     _dps_nameVals[23] = &_dpsCodes[23];
  685.     _dps_nameVals[24] = &_dpsCodes[24];
  686.     _dps_nameVals[25] = &_dpsCodes[25];
  687.     _dps_nameVals[26] = &_dpsCodes[26];
  688.     _dps_nameVals[27] = &_dpsCodes[27];
  689.     _dps_nameVals[28] = &_dpsCodes[28];
  690.     _dps_nameVals[29] = &_dpsCodes[29];
  691.     _dps_nameVals[30] = &_dpsCodes[30];
  692.     _dps_nameVals[31] = &_dpsCodes[31];
  693.     _dps_nameVals[32] = &_dpsCodes[32];
  694.     _dps_nameVals[33] = &_dpsCodes[33];
  695.     _dps_nameVals[34] = &_dpsCodes[34];
  696.     _dps_nameVals[35] = &_dpsCodes[35];
  697.     _dps_nameVals[36] = &_dpsCodes[36];
  698.     _dps_nameVals[37] = &_dpsCodes[37];
  699.     _dps_nameVals[38] = &_dpsCodes[38];
  700.     _dps_nameVals[39] = &_dpsCodes[39];
  701.     _dps_nameVals[40] = &_dpsCodes[40];
  702.  
  703.     DPSMapNames(_dpsCurCtxt, 41, _dps_names, _dps_nameVals);
  704.     }
  705.   }
  706.  
  707.   _dpsF = _dpsStat;    /* assign automatic variable */
  708.  
  709.   _dpsP[2].val.realVal =
  710.   _dpsP[24].val.realVal =
  711.   _dpsP[27].val.realVal =
  712.   _dpsP[38].val.realVal =
  713.   _dpsP[102].val.realVal = x;
  714.   _dpsP[9].val.realVal =
  715.   _dpsP[14].val.realVal = y;
  716.   _dpsP[3].val.realVal = width;
  717.   _dpsP[10].val.realVal = height;
  718.   _dpsP[1].val.nameVal = _dpsCodes[0];
  719.   _dpsP[116].val.nameVal = _dpsCodes[1];
  720.   _dpsP[41].val.nameVal = _dpsCodes[2];
  721.   _dpsP[33].val.nameVal = _dpsCodes[3];
  722.   _dpsP[30].val.nameVal = _dpsCodes[4];
  723.   _dpsP[8].val.nameVal = _dpsCodes[5];
  724.   _dpsP[88].val.nameVal = _dpsCodes[6];
  725.   _dpsP[49].val.nameVal = _dpsCodes[7];
  726.   _dpsP[31].val.nameVal = _dpsCodes[8];
  727.   _dpsP[28].val.nameVal = _dpsCodes[9];
  728.   _dpsP[13].val.nameVal = _dpsCodes[10];
  729.   _dpsP[74].val.nameVal = _dpsCodes[11];
  730.   _dpsP[46].val.nameVal = _dpsCodes[12];
  731.   _dpsP[34].val.nameVal = _dpsCodes[13];
  732.   _dpsP[25].val.nameVal = _dpsCodes[14];
  733.   _dpsP[18].val.nameVal = _dpsCodes[15];
  734.   _dpsP[125].val.nameVal = _dpsCodes[16];
  735.   _dpsP[122].val.nameVal = _dpsCodes[17];
  736.   _dpsP[115].val.nameVal = _dpsCodes[18];
  737.   _dpsP[111].val.nameVal = _dpsCodes[19];
  738.   _dpsP[108].val.nameVal = _dpsCodes[20];
  739.   _dpsP[101].val.nameVal = _dpsCodes[21];
  740.   _dpsP[21].val.nameVal = _dpsCodes[22];
  741.   _dpsP[98].val.nameVal = _dpsCodes[23];
  742.   _dpsP[94].val.nameVal = _dpsCodes[24];
  743.   _dpsP[87].val.nameVal = _dpsCodes[25];
  744.   _dpsP[84].val.nameVal = _dpsCodes[26];
  745.   _dpsP[80].val.nameVal = _dpsCodes[27];
  746.   _dpsP[73].val.nameVal = _dpsCodes[28];
  747.   _dpsP[81].val.nameVal = _dpsCodes[29];
  748.   _dpsP[123].val.nameVal = _dpsCodes[30];
  749.   _dpsP[109].val.nameVal = _dpsCodes[31];
  750.   _dpsP[95].val.nameVal = _dpsCodes[32];
  751.   _dpsP[85].val.nameVal = _dpsCodes[33];
  752.   _dpsP[99].val.nameVal = _dpsCodes[34];
  753.   _dpsP[86].val.nameVal = _dpsCodes[35];
  754.   _dpsP[100].val.nameVal = _dpsCodes[36];
  755.   _dpsP[113].val.nameVal = _dpsCodes[37];
  756.   _dpsP[127].val.nameVal = _dpsCodes[38];
  757.   _dpsP[114].val.nameVal = _dpsCodes[39];
  758.   _dpsP[128].val.nameVal = _dpsCodes[40];
  759.   DPSBinObjSeqWrite(_dpsCurCtxt,(char *) &_dpsF,1036);
  760. }
  761. #line 93 "drawingFuncs.psw"
  762.